home *** CD-ROM | disk | FTP | other *** search
- object dlgConfig: TdlgConfig
- Left = 192
- Top = 107
- BorderStyle = bsDialog
- Caption = 'Spam Deputy Options'
- ClientHeight = 242
- ClientWidth = 544
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- OldCreateOrder = False
- Position = poScreenCenter
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object btnOK: TButton
- Left = 381
- Top = 210
- Width = 75
- Height = 25
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 0
- OnClick = btnOKClick
- end
- object btnCancel: TButton
- Left = 461
- Top = 210
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 1
- end
- object pgcOptions: TPageControl
- Left = 8
- Top = 8
- Width = 528
- Height = 193
- ActivePage = tabSpamCop
- TabOrder = 2
- OnChange = pgcOptionsChange
- object tabSpamCop: TTabSheet
- Caption = 'SpamCop'
- object chkSpamCop: TCheckBox
- Left = 5
- Top = 5
- Width = 211
- Height = 17
- Caption = 'Report spam via the SpamCop website'
- Checked = True
- State = cbChecked
- TabOrder = 0
- OnClick = chkSpamCopClick
- end
- object grpSpamCop: TGroupBox
- Left = 5
- Top = 25
- Width = 511
- Height = 136
- Caption = 'SpamCop'
- TabOrder = 1
- object Label1: TLabel
- Left = 10
- Top = 45
- Width = 222
- Height = 13
- Caption = 'Please enter your SpamCop authorization URL:'
- end
- object Label2: TLabel
- Left = 20
- Top = 85
- Width = 481
- Height = 26
- AutoSize = False
- Caption =
- 'If you have not registered with SpamCop, leave this box empty. R' +
- 'eports will be sent via e-mail and returned to you pre-authorize' +
- 'd for reporting.'
- WordWrap = True
- end
- object Label3: TLabel
- Left = 10
- Top = 85
- Width = 4
- Height = 13
- Caption = '*'
- end
- object Label4: TLabel
- Left = 10
- Top = 115
- Width = 8
- Height = 13
- Caption = '**'
- end
- object Label5: TLabel
- Left = 20
- Top = 115
- Width = 283
- Height = 13
- Caption = 'For more information or to subscribe to SpamCop, click here:'
- end
- object lblSpamCopLink: TLabel
- Left = 307
- Top = 115
- Width = 179
- Height = 13
- Cursor = crHandPoint
- Caption = 'http://spamcop.net/anonsignup.shtml'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsUnderline]
- ParentFont = False
- OnClick = lblHyperLinkClick
- end
- object edtSpamCopUrl: TEdit
- Left = 10
- Top = 60
- Width = 491
- Height = 21
- TabOrder = 3
- end
- object rdoPayingMember: TRadioButton
- Left = 10
- Top = 20
- Width = 96
- Height = 17
- Caption = 'Paying member'
- TabOrder = 0
- OnClick = rdoPayingMemberClick
- end
- object rdoFreeMember: TRadioButton
- Left = 135
- Top = 20
- Width = 96
- Height = 17
- Caption = 'Free member'
- TabOrder = 1
- OnClick = rdoFreeMemberClick
- end
- object rdoNotAMember: TRadioButton
- Left = 250
- Top = 20
- Width = 96
- Height = 17
- Caption = 'Not a member'
- Checked = True
- TabOrder = 2
- TabStop = True
- OnClick = rdoNotAMemberClick
- end
- end
- end
- object tabSRC: TTabSheet
- Caption = 'Spam Recycling Center'
- ImageIndex = 1
- object chkSRC: TCheckBox
- Left = 5
- Top = 5
- Width = 211
- Height = 17
- Caption = 'Send spam to Spam Recycling Center'
- Checked = True
- State = cbChecked
- TabOrder = 0
- OnClick = chkSRCClick
- end
- object grpSRC: TGroupBox
- Left = 5
- Top = 25
- Width = 511
- Height = 136
- Caption = 'Spam Recycling Center'
- TabOrder = 1
- object Label6: TLabel
- Left = 10
- Top = 47
- Width = 28
- Height = 13
- Caption = 'State:'
- end
- object Label7: TLabel
- Left = 105
- Top = 47
- Width = 287
- Height = 13
- Caption = '(US residents only, SRC will notify your State Representative)'
- end
- object lblSRCLink: TLabel
- Left = 322
- Top = 115
- Width = 140
- Height = 13
- Cursor = crHandPoint
- Caption = 'http://www.spamrecycle.com'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsUnderline]
- ParentFont = False
- OnClick = lblHyperLinkClick
- end
- object Label10: TLabel
- Left = 10
- Top = 115
- Width = 8
- Height = 13
- Caption = '**'
- end
- object Label9: TLabel
- Left = 20
- Top = 115
- Width = 297
- Height = 13
- Caption = 'For more information on the Spam Recycling Center, click here:'
- end
- object rdoSRCDisplay: TRadioButton
- Left = 250
- Top = 20
- Width = 216
- Height = 17
- Caption = 'Display Only (review and send manually)'
- Checked = True
- TabOrder = 1
- TabStop = True
- end
- object rdoSRCSend: TRadioButton
- Left = 10
- Top = 20
- Width = 206
- Height = 17
- Caption = 'Send (automatic, uses default account)'
- TabOrder = 0
- end
- object cmbState: TComboBox
- Left = 45
- Top = 45
- Width = 51
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 2
- Items.Strings = (
- ''
- 'AL'
- 'AK'
- 'AS'
- 'AZ'
- 'AR'
- 'CA'
- 'CO'
- 'CT'
- 'DE'
- 'DC'
- 'FL'
- 'GA'
- 'GU'
- 'HI'
- 'ID'
- 'IL'
- 'IN'
- 'IA'
- 'KS'
- 'KY'
- 'LA'
- 'ME'
- 'MD'
- 'MA'
- 'MI'
- 'MN'
- 'MS'
- 'MO'
- 'MT'
- 'NE'
- 'NV'
- 'NH'
- 'NJ'
- 'NM'
- 'NY'
- 'NC'
- 'ND'
- 'OH'
- 'OK'
- 'OR'
- 'PA'
- 'PR'
- 'RI'
- 'SC'
- 'SD'
- 'TN'
- 'TX'
- 'UT'
- 'VT'
- 'VI'
- 'VA'
- 'WA'
- 'WV'
- 'WI'
- 'WY')
- end
- end
- end
- object tabForward: TTabSheet
- Caption = 'Forward'
- ImageIndex = -1
- object Label17: TLabel
- Left = 139
- Top = 6
- Width = 353
- Height = 13
- Caption =
- '(some ISPs, filtering companies and/or government agencies accep' +
- 't spam)'
- end
- object chkForwardSpam: TCheckBox
- Left = 5
- Top = 5
- Width = 131
- Height = 17
- Caption = 'Forward spam to others'
- TabOrder = 0
- OnClick = chkForwardSpamClick
- end
- object GroupBox1: TGroupBox
- Left = 5
- Top = 25
- Width = 511
- Height = 136
- Caption = 'Forwarding'
- TabOrder = 1
- object Label12: TLabel
- Left = 10
- Top = 45
- Width = 203
- Height = 13
- Caption = 'Please enter destination e-mail address(es):'
- end
- object Label13: TLabel
- Left = 10
- Top = 85
- Width = 4
- Height = 13
- Caption = '*'
- end
- object Label14: TLabel
- Left = 20
- Top = 85
- Width = 414
- Height = 13
- Caption =
- 'Seperate each e-mail address with a semi-colon (e.g. spam@youris' +
- 'p.com; uce@ftc.gov)'
- end
- object Label15: TLabel
- Left = 10
- Top = 115
- Width = 8
- Height = 13
- Caption = '**'
- end
- object Label16: TLabel
- Left = 20
- Top = 115
- Width = 411
- Height = 13
- Caption =
- 'DO NOT forward spam to those who do not want it, as that would m' +
- 'ake you a spammer'
- end
- object rdoForwardDisplay: TRadioButton
- Left = 250
- Top = 20
- Width = 216
- Height = 17
- Caption = 'Display Only (review and send manually)'
- Checked = True
- TabOrder = 1
- TabStop = True
- end
- object rdoForwardSend: TRadioButton
- Left = 10
- Top = 20
- Width = 206
- Height = 17
- Caption = 'Send (automatic, uses default account)'
- TabOrder = 0
- end
- object edtForwardTo: TEdit
- Left = 10
- Top = 60
- Width = 491
- Height = 21
- TabOrder = 2
- end
- end
- end
- object tabActions: TTabSheet
- Caption = 'Actions'
- ImageIndex = 5
- object Label25: TLabel
- Left = 10
- Top = 6
- Width = 221
- Height = 13
- Caption = 'Maximum number of spams to process at once:'
- end
- object grpActions: TGroupBox
- Left = 5
- Top = 25
- Width = 511
- Height = 136
- Caption = 'Actions'
- TabOrder = 0
- object Label8: TLabel
- Left = 10
- Top = 45
- Width = 291
- Height = 13
- Caption = 'Please enter the destination Folder (if "Move spam" selected):'
- end
- object edtSpamFolder: TEdit
- Left = 10
- Top = 60
- Width = 491
- Height = 21
- TabOrder = 3
- Text = 'Spam Deputy'
- end
- object rdoMoveSpam: TRadioButton
- Left = 10
- Top = 20
- Width = 96
- Height = 17
- Caption = 'Move spam'
- Checked = True
- TabOrder = 0
- TabStop = True
- OnClick = rdoMoveSpamClick
- end
- object rdoDeleteSpam: TRadioButton
- Left = 130
- Top = 20
- Width = 96
- Height = 17
- Caption = 'Delete spam'
- TabOrder = 1
- OnClick = rdoDeleteSpamClick
- end
- object rdoNothing: TRadioButton
- Left = 250
- Top = 20
- Width = 96
- Height = 17
- Caption = 'Nothing'
- TabOrder = 2
- OnClick = rdoNothingClick
- end
- object chkMarkRead: TCheckBox
- Left = 10
- Top = 90
- Width = 96
- Height = 17
- Caption = 'Mark as Read'
- Checked = True
- State = cbChecked
- TabOrder = 4
- OnClick = chkSRCClick
- end
- object chkAddToJunkSender: TCheckBox
- Left = 10
- Top = 110
- Width = 161
- Height = 17
- Caption = 'Add to "Junk Senders List"'
- Checked = True
- State = cbChecked
- TabOrder = 5
- OnClick = chkSRCClick
- end
- end
- object udMaxSpams: TUpDown
- Left = 256
- Top = 5
- Width = 15
- Height = 21
- Associate = edtMaxSpams
- Min = 1
- Max = 10
- Position = 5
- TabOrder = 1
- Wrap = False
- end
- object edtMaxSpams: TEdit
- Left = 235
- Top = 5
- Width = 21
- Height = 21
- TabOrder = 2
- Text = '5'
- end
- end
- object tabOther: TTabSheet
- Caption = 'Other'
- ImageIndex = 2
- object Label11: TLabel
- Left = 109
- Top = 6
- Width = 375
- Height = 13
- Caption =
- '(when selecting multiple spams, only the last item will be copie' +
- 'd to the clipboard)'
- end
- object chkCopyToClipboard: TCheckBox
- Left = 5
- Top = 5
- Width = 103
- Height = 17
- Caption = 'Copy to clipboard'
- TabOrder = 0
- OnClick = chkSRCClick
- end
- end
- object tabRegistration: TTabSheet
- Caption = 'Registration'
- ImageIndex = 4
- object Label18: TLabel
- Left = 10
- Top = 145
- Width = 8
- Height = 13
- Caption = '**'
- end
- object Label19: TLabel
- Left = 20
- Top = 145
- Width = 229
- Height = 13
- Caption = 'To register this copy of Spam Deputy, click here:'
- end
- object Label20: TLabel
- Left = 257
- Top = 145
- Width = 241
- Height = 13
- Cursor = crHandPoint
- Caption = 'http://members.home.net/spamdeputy/register.htm'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsUnderline]
- ParentFont = False
- OnClick = lblHyperLinkClick
- end
- object Label21: TLabel
- Left = 10
- Top = 12
- Width = 46
- Height = 13
- Caption = 'Serial No:'
- end
- object Label22: TLabel
- Left = 10
- Top = 42
- Width = 80
- Height = 13
- Caption = 'Registration Key:'
- end
- object Label23: TLabel
- Left = 10
- Top = 72
- Width = 33
- Height = 13
- Caption = 'Status:'
- end
- object lblRegStatus: TLabel
- Left = 95
- Top = 72
- Width = 60
- Height = 13
- Caption = 'Unregistered'
- end
- object Label24: TLabel
- Left = 10
- Top = 97
- Width = 38
- Height = 13
- Caption = 'Version:'
- end
- object lblVersion: TLabel
- Left = 95
- Top = 97
- Width = 3
- Height = 13
- end
- object edtSerialNo: TEdit
- Left = 95
- Top = 10
- Width = 121
- Height = 21
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 0
- end
- object edtRegKey: TEdit
- Left = 95
- Top = 40
- Width = 121
- Height = 21
- TabOrder = 1
- OnChange = edtRegKeyChange
- end
- object btnRegister: TButton
- Left = 225
- Top = 40
- Width = 50
- Height = 21
- Caption = '&Register'
- Enabled = False
- TabOrder = 2
- OnClick = btnRegisterClick
- end
- end
- end
- end
-